home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d12
/
v10n09.arc
/
FILETYPE.BAT
< prev
next >
Wrap
DOS Batch File
|
1991-04-16
|
1KB
|
53 lines
@ECHO OFF
REM FILETYPE.BAT
:NO FILESPEC
IF %1.==. GOTO END
:ZIP
SET FT=ZIP
FIND /N "PK" %1 |FIND "[1]" > FILETYP1.$$$
COPY FILETYP1.$$$ FILETYPE.$$$ >NUL
IF EXIST FILETYPE.$$$ GOTO END
:EXEC
SET FT=EXE
FIND /N "MZ" %1 |FIND "[1]" > FILETYP2.$$$
COPY FILETYP2.$$$ FILETYPE.$$$ >NUL
IF EXIST FILETYPE.$$$ GOTO END
:COM
SET FT=COM
FIND /N "Θ" %1 | FIND "[1]" > FILETYP3.$$$
COPY FILETYP3.$$$ FILETYPE.$$$ >NUL
IF EXIST FILETYPE.$$$ GOTO END
:WordPerfect
SET FT=WordPerfect
REM This v character is an ASCII 255
FIND /N " FFWPC" %1 | FIND "[1]" > FILETYP4.$$$
REM This ^ character is an ASCII 255
COPY FILETYP4.$$$ FILETYPE.$$$ >NUL
IF EXIST FILETYPE.$$$ GOTO END
:Device Driver
SET FT=DeviceDriver
REM The vvvv four seeming blanks are all ASCII 255
FIND /N " FF FF FF FF" %1 | FIND "[1]" > FILETYP5.$$$
REM The ^^^^ four seeming blanks are all ASCII 255
COPY FILETYP5.$$$ FILETYPE.$$$ >NUL
IF EXIST FILETYPE.$$$ GOTO END
SET FT=
ECHO FILE TYPE IS NOT EXE, COM, ZIP, WordPerfect, OR Device Driver.
GOTO OUT
:END
ECHO FILE TYPE IS: %FT%
SET FT=
:OUT
FOR %%A IN (1 2 3 4 5 E) DO IF EXIST FILETYP%%A.$$$ DEL FILETYP%%A.$$$ >NUL
:END